www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8(全功能,无限制,完全开源)/admin/Pinke_edit.asp
<!--#include file="../Ku_inc/Ku_sql.asp"--> <!--#include file="../Ku_inc/Ku_config.asp"--> <!--#include file="Ku_conn.asp"--> <!--#include file="../Ku_inc/inc.asp"--> <!-- #include file="Session.asp"--> <% id=request("id") if id ="" then response.Write("<script>alert(""黑客行为!"");location.href=""Pinke_list.asp"";</script>") end if set rs=server.createobject("adodb.recordset") sql="select * from Gu_pinke where id="&id rs.open sql,conn,1,3 %> <html> <head> <title>增加拼客信息</title> <link href="include/style.css" rel="stylesheet" type="text/css"> <style type="text/css"> <!-- .news_add{ height:22px; border:1px solid #BEBEBE; background-color:#FFF; padding-top: 2px; padding-right: 8px; padding-bottom: 0pt; padding-left: 3px; } input{ height:22px; border:1px solid #BEBEBE; background-color:#FFF; padding-top: 2px; padding-right: 8px; padding-bottom: 0pt; padding-left: 3px; } --> </style> </head> <body> <div align="center"> <table border="0" width="95%" height="70" cellpadding="0" cellspacing="0" > <tr > <td height="32" style="border: 1px solid #D0D4D9" bgcolor="#EEEEEE" > <b>当前栏目:</b>> 编辑拼客信息</td> </tr> <tr><td height="38"> <input class="input_back" type="button" name="Submit4" value="拼客分类"onclick="location.href='pinke_kind.asp'"/> <input class="input_back" type="button" name="Submit3" value="信息列表"onclick="location.href='Pinke_list.asp'"/> <input class="input_back" type="button" name="Submit2" value="管理首页"onclick="location.href='main.asp'"/></td></tr> </table> </div> <div align="center"> <table border="0" width="95%" cellpadding="0" cellspacing="0" height="506"> <tr> <td height="506" width="100%"> <form name="myform" action="Deal_pinke.asp?action=edit_info&id=<%=id%>" method="post"> <div align="center"> <table width="100%" height="624" bgcolor="#ECECE3" cellpadding="0" cellspacing="1"> <tr> <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">标 题:</div></td> <td bgcolor="#FFFFFF" height="27" width="88%"> <input name="biaoti" type="text" size="78" maxlength="35" value="<%=rs("title")%>" > <font color="red">*</font> 审核<input name="shenhe" type="checkbox" id="kind" value="1"<%if rs(shenhe)=1 then%> checked<%end if%>></td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">拼客分类:</div></td> <td bgcolor="#FFFFFF" height="28" width="88%"> <% set rsk=server.createobject("adodb.recordset") sqlk="select * from Gu_pkind where id="&rs("pkind") rsk.open sqlk,conn,1,3 set rsclass=server.createobject("adodb.recordset") sqlclass = "select * from Gu_pkind" rsclass.open sqlclass,conn,1,1 if rsclass.eof and rsclass.bof then response.write "请先添加分类。" response.end else %> <SELECT name="pkind" size="1"> <OPTION value="<%=trim(rsk("id"))%>"><%=trim(left(rsk("name"),6))%></OPTION> <%do while not rsclass.eof %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("name"),6))%></OPTION> <% rsclass.movenext loop end if rsclass.close rsk.close %></SELECT> <font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="30"> <p align="right">分类选择:</td> <td bgcolor="#FFFFFF" width="88%"> <% set rsk=server.createobject("adodb.recordset") sqlk="select * from Gu_pgq where id="&rs("pgq") rsk.open sqlk,conn,1,3 set rsclass=server.createobject("adodb.recordset") sqlclass = "select * from Gu_pgq" rsclass.open sqlclass,conn,1,1 if rsclass.eof and rsclass.bof then response.write "请先添加分类。" response.end else %> <SELECT name="pgq" size="1"> <OPTION value="<%=trim(rsk("id"))%>"><%=trim(left(rsk("name"),6))%></OPTION> <%do while not rsclass.eof %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("name"),6))%></OPTION> <% rsclass.movenext loop end if rsclass.close rsk.close %></SELECT> <font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="30"> <p align="right">地区选择:</td> <td bgcolor="#FFFFFF" width="88%"> <!--所属地区 开始--> <% dim rsclass,sqlclass set rsclass=server.createobject("adodb.recordset") sqlclass = "select * from Gu_qu" rsclass.open sqlclass,conn,1,1 %> <SCRIPT language = "JavaScript"> var onecount; onecount=0; subcat = new Array(); <% count = 0 do while not rsclass.eof %> subcat[<%=count%>] = new Array("<%= trim(rsclass("class2"))%>","<%= trim(rsclass("class1"))%>","<%= trim(rsclass("id"))%>"); <% count = count + 1 rsclass.movenext loop rsclass.close %> onecount=<%=count%>; function changelocation(locationid) { document.myform.class2.length = 0; var locationid=locationid; var i; for (i=0;i < onecount; i++) { if (subcat[i][1] == locationid) { document.myform.class2.options[document.myform.class2.length] = new Option(subcat[i][0], subcat[i][2]); } } } </SCRIPT><% sqlclass = "select * from Gu_shi" rsclass.open sqlclass,conn,1,1 if rsclass.eof and rsclass.bof then response.write "请先添加分类。" response.end else %> <SELECT name="class1" onChange="changelocation(document.myform.class1.options[document.myform.class1.selectedIndex].value)" size="1"> <% set rsk1=server.createobject("adodb.recordset") sqlk1="select * from Gu_shi where id="&rs("shi") rsk1.open sqlk1,conn,1,3 %> <% set rsk2=server.createobject("adodb.recordset") sqlk2="select * from Gu_qu where id="&rs("qu") rsk2.open sqlk2,conn,1,3 %> <OPTION value="<%=trim(rsk1("id"))%>"><%=trim(left(rsk1("class1"),5))%></OPTION> <%do while not rsclass.eof %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("class1"),5))%></OPTION> <% rsclass.movenext loop end if rsclass.close %></SELECT> <SELECT name="class2"> <OPTION value="<%=trim(rsk2("id"))%>"><%=trim(left(rsk2("class2"),5))%></OPTION> </SELECT> <!--所属地区 结束--> <font color="red">*</font></td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">有效期:</div></td> <td bgcolor="#FFFFFF" width="88%" height="19"> <select name="yxq"> <option value="<%=rs("times")%>"><%=rs("times")%>天</option> <option value="1">1天</option> <option value="2">2天</option> <option value="3">3天</option> <option value="7">7天</option> <option value="10">10天</option> <option value="15">15天</option> <option value="20">20天</option> <option value="30">30天</option> <option value="45">45天</option> <option value="30">一个月</option> <option value="90">三个月</option> </select><font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="163"><div align="right">内 容:</div></td> <td bgcolor="#FFFFFF" height="163" width="88%"> <textarea name="neirong" cols="84" rows="11"><%=rs("content")%></textarea> <font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="36"> <p align="right">相关图片:</td> <td bgcolor="#FFFFFF" height="36" width="88%"> <input name="pic" type="text" id="pic" size="36" value="<%if rs("pic")<>"" then%>../<%=rs("pic")%><%end if%>" ></td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="35"> <p align="right">上传图片:</td> <td bgcolor="#FFFFFF" height="35" width="88%"> <iframe frameborder=0 width=290 height=25 scrolling=no src="upload.asp?action=art"></iframe> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="43"><div align="right">发布人:</div></td> <td bgcolor="#FFFFFF" height="43" width="88%"> <input name="fbr" type="text" size="35" maxlength="15" value="<%=rs("username")%>"> <font color="red">*</font> (不可修改)</td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="36"><div align="right">联系人:</div></td> <td bgcolor="#FFFFFF" height="36" width="88%"> <input name="lianxiren" type="text" size="35" maxlength="15" value="<%=rs("lianxiren")%>"> <font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="32"><div align="right">联系电话:</div></td> <td bgcolor="#FFFFFF" height="32" width="88%"> <input name="dianhua" type="text" size="35" maxlength="30" value="<%=rs("tel")%>"> <font color="red">*</font> </td> </tr> <tr> <td width="12%" bgcolor="#FFFFFF" height="34"><div align="right">联系QQ:</div></td> <td bgcolor="#FFFFFF" height="34" width="88%"> <input name="qq" type="text" size="35" maxlength="11" value="<%=rs("qq")%>"> </td> </tr> <tr> <td width="12%" height="38" bgcolor="#FFFFFF"> <p align="right">联系E_mail:</td> <td bgcolor="#FFFFFF" width="88%"> <input name="email" type="text" size="35" maxlength="20" value="<%=rs("email")%>"> </td> </tr> <tr> <td width="12%" height="32" bgcolor="#FFFFFF"><div align="right">联系地址:</div></td> <td bgcolor="#FFFFFF" width="88%"> <input name="dizhi" type="text" size="56" maxlength="50" value="<%=rs("address")%>"> </td> </tr> <tr> <td colspan="2" bgcolor="#FFFFFF" height="42"><div align="center"><input type="submit" value="修改信息" > <input type="reset" value="取消发布"></div></td> </tr> </table> </div> </form> </td> </tr> </table> </div><hr/> <p align="center"><!-- #include file="Ku_bottom.asp"--></p> </body> </html>